clear all
set more off
tempfile temp

** PATHS
local working ../working
local ubigeo ../ubigeo

** DATA
use actos_est_new

gen year = ano
gen month = year(fechamed)

gen killed = inlist(idtipoac,"LDS","MAE","MAT","MEF")

collapse (sum) killed, by(year idevent) 
gen events = 1
collapse (sum) events killed, by(year)

label var events "Events"
label var killed "Killed"

graph bar events killed, over(year, label(labsize(vsmall))) legend(label(1 "Events") label(2 "Killed")) 
graph export Figure_1.png, replace